home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 6 / FM Towns Free Software Collection 6.iso / t_os / na386 / hello.asm < prev    next >
Assembly Source File  |  1993-07-08  |  1KB  |  48 lines
  1. 1000 ';***   hello.exp sample program   ***
  2. 1010 '
  3. 1020 'TBIOS EQU 110H
  4. 1030 '
  5. 1040 'ENTRY:
  6. 1050 '  MOV  AX,DS                ;セレクタの設定
  7. 1060 '  MOV  ES,AX
  8. 1070 '  PUSH TBIOS
  9. 1080 '  POP  FS
  10. 1090 '
  11. 1100 '  PUSH DS                  ;EGBの初期化
  12. 1110 '  POP  GS
  13. 1120 '  MOV  EDI,OFFSET GWORK
  14. 1130 '  MOV  ECX,GSIZE
  15. 1140 '  MOV  AH,0
  16. 1150 '  CALL PWORD PTR FS:[20H]
  17. 1160 '
  18. 1170 '  MOV  EDI,OFFSET GWORK     ;書き込みページの指定
  19. 1180 '  MOV  AL,1
  20. 1190 '  MOV  AH,5
  21. 1200 '  CALL PWORD PTR FS:[20H]
  22. 1210 '
  23. 1220 '  MOV  EDI,OFFSET GWORK     ;表示ページの指定
  24. 1230 '  MOV  AL,1
  25. 1240 '  MOV  EDX,3
  26. 1250 '  MOV  AH,6
  27. 1260 '  CALL PWORD PTR FS:[20H]
  28. 1270 '
  29. 1280 '  MOV  EDI,OFFSET GWORK     ;文字列の表示
  30. 1290 '  MOV  ESI,OFFSET MSG
  31. 1300 '  MOV  AH,60H
  32. 1310 '  CALL PWORD PTR FS:[20H]
  33. 1320 '
  34. 1330 '  XOR  AL,AL                ;TOWNS-OSへ戻る
  35. 1340 '  MOV  AH,4CH
  36. 1350 '  INT  21H
  37. 1360 '
  38. 1370 'MSG DW  100,120,MSG2-MSG1
  39. 1380 'MSG1 DB  'おめでとう！　３８６の世界へようこそ！'
  40. 1390 'MSG2:
  41. 1400 '
  42. 1410 'GSIZE EQU 1000H
  43. 1420 'GWORK DB  GSIZE DUP(0)
  44. 1430 '
  45. 1440 '  STACK 1000H              ;スタックの大きさの指定
  46. 1450 '  END   ENTRY              ;入口番地の指定
  47. 1460 '
  48.